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* 

* (C) Copyright 2002 Matsushita Electric Industrial Co., Ltd. 

* fixammp. h 

* Version: 

* Release: 

* Date : 2002/6/1 4 vO. 9. 1 -convert i b I e 
* 

^^^^^^^^ ^t^^^^^^f ^W* ^^^^^ ^^^^\^ ^\^*^^^ ^9^^\^ ^^**^^^^^**^^*^^^^*^n^^^^^^**^^**^^^^* > ^^^^^*^^*^^*^^* > ^^*^^^^^^^^^*'^^*^^^^^^* J ^^^^* > ^^^^^^^^^**^^^^^*'^^ # 

/* Avoid overloading */ 
#ifndef _FIXAMMP_ 
#define _FIXAMMP_ 

/* FIX-Lib. Class definition */ 
class FIX16J 
class F I X32_1 
class FIX16_2 
class FIX32 2 



#if def i ned (_AMMPCC 
#pragma _pack_struct 
#endif //_AMMPCC_ 

////////////////////////////////////////////////////////////////////// 
// Member of FIX16_1 

// 

// val : Actual value in 16 bits 

// 

////////////////////////////////////////////////////////////////////// 
class FIX16_1 { 

short val ; 
pub lie: 

// constructor 
FIX16J () 0 
FIX16J (int a) : 
FIX16J (float a) ; 
FIX16J (double a) : 
FIX16J (FIX16J& a) 
{ 

val = a. val ; 

} 

FIX16J (volati le FIX16J& a) 
{ 

va I = a. va I ; 

} 

FIX16J (const FIX16J& a) 
{ 

val = a. val ; 

} 

// Operator 

volatile FIX16 1& operator=(FIX16 1 a) volatile 
{ 

val = a. val ; 
return *this; 

} 

FIX16J& operator=(FIX16_1 a) 
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val = a. val ; 
return *this; 



} 

friend FIX 
friend FIX 
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friend FIX 
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fr 
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operator+(FIX16_1 a) ; 

operator- (F I X16J a) ; 

operator+(FIX16_1 a, FIX16J b) 

operator- (F I XI 6_1 a. FIX16J b) 



operator* (F I X16_1 a, 

operator* (int a, 

operator* (F I XI 6_1 a, 

operator* (float a, 

operator* (F I X16_1 a, 

operator* (double a, 

operator* (F I XI 6_1 a, 



FIX16J b) 

FIX16J b) 

int ~ b) 

FIX16J b) 

f I oat b) 

FIX16J b) 

doub I e b) 



operator<(FIX16_1 a, FIX16J b) ; 
operator>(FIX16_1 a, FIX16J b) : 
operators (F I X16_1 a, FIX16J b) : 
operators (F I XI 6_1 a. FIX16J b) : 
operator=(FIX16_1 a, FIX16J b) ; 
operator!=(FIX16_1 a, FIX16J b) ; 



operator/ (F I X16_1 a, FIX16J b) 

operator/ (F I X16_1 a, int b) 

operator/ (F I XI 6_1 a, float b) 

operator/ (F I X16_1 a, double b) ; 

operator «(F I X16_1 a. intb): 
operator»(FIX16_1 a. intb); 
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short valueO {return val;} 
// Other functions 
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iend 


FIX16J 


f i x1 61 (short a) ; 
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iend 


short 


bptn(FIX16 1 a) ; 
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iend 


FIX16 1 


fix161 (FIX32 1 a) ; 
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iend 


float _ 


float(FIX16 1a); 
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iend 


doub I e 


_doub I e (F I X1 6_1 a); 
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iend 


FIX16 1 


abs(FIX16 1 a); 
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iend 


FIX16 1 


max(FIX16 1 a, FIX16 1 b) ; 
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iend 


FIX16 1 


min(FIX16 1 a, FIX16 1 b) ; 
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iend 
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adds(FIX16 1 a, FIX16 1 b) : 
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iend 


FIX16J 


subs(FIX16 1 a, FIX16 1 b) ; 
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fr 


iend 


int 


bseq(FIX16 1 a); 












fr 


iend 


int 


bseqO(FIX16 1 a) : 












fr 


iend 


int 
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iend 
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_div(FIX16 1 a. float b) : 
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div(FIX16 1 a. double b) ; 













}: 

////////////////////////////////////////////////////////////////////// 

// Member of FIX32 1 

// 

// val : Actual value in 32 bits 

// 

////////////////////////////////////////////////////////////////////// 
class FIX32J { 

I ong va I ; 

pub lie: 

// constructor 

FIX32J o (}; 

FIX32J (int a) ; 
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F I X32J (f I oat a) ; 
F I X32_1 (double a); 
FIX32_I(FIX16_1 a); 
FIX32J (FIX32 1& a) 
{ 

val = a. val ; 

} 

FIX32 1 (volati le FIX32 1& a) 
{ 

va I = a. va I ; 

} 

FIX32J (const FIX32J& a) 
{ 

va I = a. va I ; 

} 

// Operator 

volatile FIX32J& operator=(FIX32_1 a) volatile 

val = a. val ; 
return *this; 

} 

FIX32 1& operator (F 1X32 1 a) 
{ 

val = a. val ; 
return *this; 

} 

friend FIX32J operator+(FIX32_1 a); 
friend FIX32J operator- (F I X32J a); 
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friend bool operator<(FIX32_1 a, FIX32J b) ; 

friend bool operator>(FIX32_1 a, FIX32J b) ; 

friend bool operator<=(FIX32_1 a, FIX32J b) : 

friend bool operator>=(FIX32_1 a, FIX32J b) ; 

friend bool operator=(FIX32_1 a, FIX32J b) ; 

friend bool operator !=(F I X32J a. FIX32J b) ; 

volatile FIX32J& operator«=(int b) volatile; 

FIX32J& operator«=(int b) ; 
volatile FIX32J& operator»=(int b) volatile; 
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long valueO {return val;} 

// Other functions 
friend FIX32J _fix321(long a); 
friend long _bptn (F I X32J a); 
friend float _f I oat (F I X32_1 a); 
friend double _doub I e (F I X32_1 a); 
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fr 



end FIX32J 

end FIX32J 

end FIX32J 

end FIX32J 

end FIX32J 

end int 

end int 

end int 

end int 

end FIX16 1 



_abs(FIX32_1 a); 
_max(FIX32_1 a, FIX32J b) : 
_min(FIX32_1 a, FIX32J b) : 
_adds(FIX32_1 a, FIX32J b) ; 
_subs(FIX32_1 a, FIX32J b) ; 
_bcnt1(FIX32_1 a); 
_bseq(FIX32_1 a); 
_bseqO (F I X32_1 a); 
_bseq1 (FIX32J a); 
_round (F I X32J a); 



end int _extr (FIX32_1 a, unsigned int b, unsigned int c) ; 
end unsigned int _extru(FIX32_1 a, unsigned int b, unsigned int c) ; 
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_msu ( 


long &mh, 


1 ong&m 1 , 


FIX32 


1 


&c, 


FIX32 


1 


a, 


FIX32 


1 


b) 


f r i end 


void 


_msu ( 


long &mh, 


1 ong&m 1 , 


FIX32 


1 


&c, 


FIX16 


"1 


a, 


FIX16" 


"1 


b) 


f r i end 


void 


_msu( 


long &mh, 


1 ong&m 1 , 


FIX32 


1 


&c. 


F 1 X32~ 


"1 


a, 


FIX16" 


"1 


b) 
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f r i end void 
friend FIX32J 
friend FIX32J 
friend F I X32_1 
friend FIX32 1 



_msu(long &mh, long&ml, FIX32 1 &c, FIX16 1 a, FIX32 1 b) ; 
_div(FIX32_1 a,FIX32_1 b) ; 
_div(FIX32_1 a, int b) ; 
_div(FIX32_1 a, float b) ; 
_div(FIX32_1 a, double b) ; 



}: 

////////////////////////////////////////////////////////////////////// 
// Member of F I X1 6_2 

// val : Actual value in 16 bits 

/ ( // ^i(/{/Jl > ////^/////////////////////////////////////////////////// 
class F I XI 6_2 { 

short val : 

pub lie: 

// constructor 

FIX16_2() {} 

FIX16_2(int a) ; 

FIX16_2(float a) ; 

F I X16_2 (double a) : 

FIX16_2(FIX16 2& a) 

{ 

va I = a. va I ; 

} 

FIX16_2(volati le FIX16_2& a) 
va I = a. va I ; 

1 

FIX16_2(const FIX16 2& a) 
{ 

val = a. val ; 

1 

// Operator 

volatile FIX16_2& operator (F I XI 6_2 a) volatile 

val = a. val ; 
return *this; 

} 

FIX16.2& operator=(FIX16_2 a) 

va I = a. va I ; 
return *this; 

} 

friend FIX16_2 operator+(FIX16_2 a); 
friend FIX16_2 operator- (F I X16_2 a); 



friend FIX16_2 operator+(FIX16_2 a, 
friend FIX16_2 operator- (F I XI 6_2 a. 



FIX16_2 b) ; 
FIX16_2 b) ; 



fr 
fr 
fr 
fr 
fr 
fr 
fr 



FIX16_2 b) 
FIX16_2 b) 



int 



b) 



end FIX16_2 operator* (F I X16_2 a, 
end FIX16_2 operator* (i nt a, 
end FIX16_2 operator* (F I X16_2 a, 
end FIX16_2 operator* (float a, FIX16_2 b) 
end FIX16_2 operator* (F I X16_2 a, 
end FIX16_2 operator* (double a 
end FIX16_2 operator* (F I X16_2 a. 



float b) 
FIX16_2 b) 
doub I e b) 



W'. 
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friend FIX 
friend FIX 
friend FIX 
friend FIX 

friend FIX 
friend FIX 



fr 
fr 
fr 
fr 
fr 
fr 



end 
end 
end 
end 
end 
end 



volati 
volati 

volati 
volati 
vo I at i 
volati 

volati 
volati 
vo I at i 
vo I at i 

vo I at i 
volati 



boo 
boo 
boo 
boo 
boo 
boo 

e F 
F 

e F 
F 

e F 
F 

e F 
F 

e F 
F 
e F 



e F 
F 

e F 
F 

e F 
F 

e F 
F 

e F 
F 

e F 
F 



6_2 operator/ (F I X16_2 a, FIX16_2 b) 

6_2 operator/ (F I X16_2 a, int b) 

6_2 operator/ (F I XI 6_2 a, float b) 

6_2 operator/ (F I XI 6_2 a, double b) 

6_2 operator«(FIX16_2 a, intb); 
6_2 operator»(FIX16_2 a, int b) : 

operator<(FIX16_2 a, FIX16_2b); 
operator>(FIX16_2 a, FIX16_2 b) ; 
operators (F I XI 6_2 a, FIX16_2 b) 
operators (F I X16_2 a, FIX16_2 b) 
operator=(FIX16_2 a, FIX16_2 b) 
operator != (F I XI 6_2 a, FIX16_2 b) 

X16_2& operator«=(int b) volatile; 
X16_2& operator «= (int b) ; 
X16_2& operator»=(int b) volatile; 
X16_2& operator»=(int b) : 

X16_2& operators 
X16_2& operator*= 
X16_2& operator*= 
X16_2& operator*= 
X16_2& operator*= 
X16_2& operators 
X16_2& operator*= 
X16_2& operator*= 

X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 
X16_2& operator/= 



X16_2& operator+= 
X16_2& operator+= 
X16_2& operator-^ 
X16_2& operator-: 

short valueO {return val;} 

// Other functions 
fr 
fr 
fr 
fr 
fr 



(FIX16 2 b) 


volati 


(F 1X16.2 b) 




(int b) 


volati 


(int b) 




(f I oat b) 


volati 


(f 1 oat b) 




(doub 1 e b) 


volati 


(doub 1 e b) 




CFIX16 2 b) 


volati 


CFIX16 2 b) 




lint b) 


vo I at i 


jnt b) 




:f 1 oat b) 


volati 


[f 1 oat b) 




[doub 1 e b) 


volati 


[double b) 




:FIX16 2 b) 


volati 


;FIX16 2 b) 


• 

» 


:FIX16 2 b) 


volati 


!FIX16 2 b) 


• 

» 



end FIX16_2 _f ix1 62 (short a) : 
end short _bptn(FIX16_2 a); 
end F I XI 6_2 _f i x1 62 (F I X32_2 a) ; 
end float _f loat(FIX16_2 a); 
end double _double(FIX16_2 a); 



fr 
fr 
fr 
fr 
fr 



end FIX16_2 
end FIX16_2 
end FIX16_2 
end F 1X16.2 
end FIX16 2 



_abs(FIX16_2 a); 

_max(FIX16_2 a. FIX16_2 b) ; 

_min(FIX16_2 a, FIX16_2 b) ; 

_adds(FIX16_2 a, FIX16_2 b) ; 

_subs(FIX16_2 a, FIX16_2 b) : 
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friend int 
friend int 
friend int 
friend int 
friend FIX16 2 



_bcnt1 (FIX16_2 a) ; 
_bseq(FIX16_2 a) ; 
_bseqO (F I X1 6_2 a) ; 
_bseq1 (FIX16_2 a) ; 
_round(FIX32_2 a); 



friend int _extr (FIX16_2 a, unsigned int b, unsigned int c) ; 

friend unsigned int _extru(FIX16_2 a, unsigned int b, unsigned into); 



fr 


lend 


void 


_mul i 


[long &mh, 


I ong&m I , 


FIX16 2 &c, 


FIX16 


2 


a. 


FIX16 2 b) ; 


fr 


iend 


void 


_mul < 


[long &mh, 


I ong&m I , 


FIX32 2 &c, 


FIX16" 


"2 


a. 


FIX16 2 b); 


fr 


send 


void 


_mul I 


[long &mh f 


I ong&m I f 


FIX32 2 &c, 


FIX16" 


"2 


a. 


FIX32 2 b); 


fr 


end 


void 


_mul i 


[long &mh, 


I ong&m I , 


FIX32 2 &c, 


FIX32" 


"2 


a, 


FIX16 2 b) ; 


fr 


iend 


void 


_mac< 


[long &mh, 


I ong &m I , 


FIX16 2 &c, 


FIX16" 


2 


a, 


FIX16 2 b) ; 


fr 


end 


void 


_mac< 


[long &mh, 


long &ml ( 


FIX32 2 &c, 


FIX16" 


2 


a. 


FIX16 2 b): 


fr 


iend 


void 


_mac< 


[long &mh, 


long &m I , 


FIX32 2 &c, 


FIX32_2 


a, 


FIX16 2 b); 


fr 


iend 


void 


_mac< 


[long &mh f 


long &ml, 


FIX32 2 &c, 


FIX16 


2 


a, 


FIX32 2 b); 


fr 


iend 


void 


_msu< 


[long &mh, 


I ong&m I , 


FIX16 2 &c, 


FIX16' 


2 


a, 


FIX16 2 b); 


fr 


iend 


void 


_msui 


[long &mh, 


I ong&m I , 


FIX32 2 &c f 


FIX16" 


2 


a. 


FIX16 2 b) ; 


fr 


iend 


void 


_msu< 


[long &mh, 


I ong&m I , 


FIX32 2 &c, 


FIX32" 


"2 


a. 


FIX16 2 b); 


fr 


iend 


void 


_msm 


[long &mh, 


I ong&m I , 


FIX32 2 &c. 


FIX16" 


"2 


a. 


FIX32 2 b); 


fr 


iend 


FIX16 2 


_di v 


CFIX16 2 a, 


FIX16 2 b); 










fr 


iend 


FIX16 2 


_di v 


(FIX16 2 a, 


i nt b) ; 












fr 


iend 


FIX16 2 


_di v 


(FIX16 2 a, 


float b) 


• 










fr 


iend 


FIX16 2 


_di v 


(FIX16 2 a, 


doub I e b) ; 











}; 

////////////////////////////////////////////////////////////////////// 

// Member of FIX32_2 

// 

// val : Actual value in 32 bits 

// 

////////////////////////////////////////////////////////////////////// 
class FIX32_2{ 

long val ; 
pub lie: 

// constructor 
FIX32_2() {} 
FIX32_2(int a) : 
FIX32_2(float a) ; 
F I X32_2 (double a); 
F I X32_2 (F I X1 6_2 a) : 
F I X32_2 (F I X32_2& a) 

va I = a. va I ; 

FIX32_2 (volatile FIX32_2& a) 

va I = a. va I ; 

F I X32_2 (const FIX32_2& a) 

va I = a. va I ; 



// Operator 

volatile F I X32_2& operator=(FIX32 2 a) volatile 
{ 
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va I = a. va I ; 
return *this; 

} 

F I X32_2& operator (F I X32_2 a) 

va I = a. va I ; 
return *this; 

} 

friend FIX32_2 operator+ 
friend FIX32_2 operator- 
friend FIX32_2 operator+ 
friend FIX32_2 operator- 



fr 
fr 
fr 
fr 
fr 
fr 
fr 



end FIX32_2 operator* 
end FIX32_2 operator* 
end FIX32_2 operator* 
end FIX32_2 operator* 
end FIX32_2 operator* 
end F I X32_2 operator* 
end FIX32_2 operator* 



friend FIX32_2 operator/ 
friend FIX32_2 operator/ 
friend FIX32_2 operator/ 
friend FIX32_2 operator/ 



friend FIX32.2 operator«(FIX32_2 a, int b) 
friend FIX32_2 operator»(FIX32_2 a, int b) 



FIX32 2 


a) 


■ 

t 


FIX32_2 


a) 


t 


FIX32 2 


a, 


FIX32 2 b) ; 


F 1 X32_2 


a, 


FIX32_2 b) ; 


FIX32 2 


a, 


FIX32 2 b) ; 


int 


a. 


FIX32 2 b) ; 


FIX32 2 


a, 


int b) ; 


float 


a. 


FIX32 2 b) ; 


FIX32_2 


a, 


float b); 


doub 1 e 


a. 


FIX32_2 b) ; 


FIX32_2 


a. 


doub 1 e b) ; 


FIX32 2 


a. 


FIX32 2 b) ; 


FIX32 2 


a. 


int b); 


FIX32 2 


a. 


float b); 


FIX32 2 


a. 


doub 1 e b) ; 



fr 
fr 
fr 
fr 
fr 
fr 



end 
end 
end 
end 
end 
end 



boo 
boo 
boo 
boo 
boo 
boo 



operator<(FIX32_2 a, FIX32_2 b) ; 
operator>(FIX32_2 a, FIX32_2 b) : 
operators (F I X32_2 a. FIX32_2 b) 
operators (F I X32_2 a, FIX32_2 b) 
operator=(FIX32_2 a, FIX32_2 b) 
operator !=(F I X32_2 a, FIX32_2 b) 



volati 


le 


Fl 


X32 


2& 


operator«=(int b) 


volati le; 






Fl 


X32" 


"2& 


operator«=(int b) 


■ 

i 


vo 1 at i 


le 


Fl 


X32" 


"2& 


operator»=(int b) 


volati lei 






Fl 


X32: 


2& 


operator»=(int b) 


■ 


vo 1 at i 


le 


Fl 


1X32 


2& 


operator*=(FIX32 2b) volatile; 






Fl 


1X32" 


"2& 


operator*=(FIX32_2 b) ; 


volati 


le 


Fl 


1X32" 


"2& 


operator*=(i nt 


b) volati le: 






Fl 


1X32" 


"2& 


operator*=(int 


b); 


volati 


le 


Fl 


1X32" 


"2& 


operator*= (float 


b) vo 1 at i 1 e ; 






Fl 


1X32" 


"2& 


operator*= (float 


b); 


volati 


le 


Fl 


1X32 


2& 


operator*= (doub 1 e 


b) vo 1 at i 1 e ; 






Fl 


IX32I 


~2& 


operator*= (doub 1 e 


b); 


vo 1 at i 


le 


Fl 


1X32 


2& 


operator/=(FIX32 2 


b) vo 1 at i 1 e 






F 


1X32 


2& 


operator/=(FIX32_2 


b); 


vo 1 at i 


le 


F 


1X32" 


"2& 


operator/=(int 


b) volati le 






F 


1X32" 


2& 


operator/=(int 


b); 


volati 


le 


F 


1X32" 


"2& 


operator/= (float 


b) volati le; 






F 


1X32" 


"2& 


operator/= (float 


b); 


volati 


le 


F 


1X32" 


"2& 


operator /= (double 


b) volati le; 






F 


1X32" 


"2& 


operator/= (double 


b); 




> 



I 
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volatile FIX32_2& operator+=(FIX32_2 b) volatile; 

F I X32_2& operator+= (F I X32_2 b) ; 

volatile FIX32_2& operator-=(FIX32_2 b) volatile; 

FIX32_2& operators (F I X32_2 b) ; 

long va I ueO {return val;} 
// Other functions 



fr 


i end 


FIX32_2 


_f i x322 ( I ong a) ; 








fr 


iend 


long bptn(FIX32 2 a) : 








fr 


iend 


float f loat(FIX32 2 a) : 








fr 


iend 


double 


doub I e (F 1 X32_2 a) ; 








fr 


iend 


FIX32 2 


abs(FIX32 2 a) ; 








fr 


iend 


FIX32 2 


max(FIX32 2 a, FIX32 2 b) ; 








fr 


iend 


FIX32 2 


min(FIX32 2 a, FIX32 2 b) : 








fr 


iend 


FIX32 2 


adds(FIX32 2 a, FIX32 2 b) ; 








fr 


iend 


FIX32_2 


subs(FIX32 2 a, FIX32 2 b) ; 








fr 


iend 


int 


bcntl (FIX32 2 a); 








fr 


iend 


int 


bseq(FIX32 2 a) ; 








fr 


iend 


int 


bseqO(FIX32 2 a) : 








fr 


iend 


int 


bseql (FIX32 2 a) ; 








fr 


iend 


FIX16_2 


round (F 1X32 2 a) ; 








fr 


iend 


int 


_extr (FIX32_2 a, unsigned int b, unsigned int c) ; 


fr 


iend 


uns i gned 


int _extru(FIX32_2 a, unsigned int b, unsigned 


i nt c) ; 


fr 


iend 


void 


mul (long &mh, long&ml, FIX32 2 &c. 


FIX32 2 


a. 


FIX32 2 b) 


fr 


iend 


void 


muldong &mh, long&ml, FIX32 2 &c. 


FIX16 2 


a, 


FIX16 2 b) 


fr 


iend 


void 


mul (long &mh, long&ml, FIX32 2 &c. 


FIX16 2 


a, 


FIX32 2 b) 


fr 


iend 


void 


_mu 1 ( 1 ong &mh, long&ml, FIX32_2 &c. 


F I X32_2 


a, 


F I X1 6_2 b) 


fri 


iend 


void 


mac (long &mh, long &ml, FIX32 2 &c. 


FIX16 2 


a. 


FIX16 2 b) 


fri 


iend 


void 


macdong &mh, long &ml, FIX32 2 &c. 


FIX32 2 


a, 


FIX32 2 b) 


fri 


iend 


void 


macdong &mh, long &ml. FIX32 2 &c. 


FIX32 2 


a, 


FIX16 2 b) 


fri 


iend 


void 


_mac(long &mh, long &ml, FIX32 2 &c. 


FIX16 2 


a. 


FIX32 2 b) 


fri 


iend 


void 


_msu(long &mh, long&ml, FIX32 2 &c, 


FIX32 2 


a, 


FIX32 2 b) 


fr 


iend 


void 


msudong &mh, long&ml, FIX32 2 &c, 


FIX16 2 


a, 


FIX16 2 b) 


fr 


iend 


void 


_msu(long &mh, long&ml, FIX32 2 &c, 


FIX32 2 


a. 


FIX16 2 b) 


fri 


iend 


void 


msudong &mh, long&ml. FIX32 2 &c. 


FIX16 2 


a, 


FIX32 2 b) 


fri 


iend 


FIX32 2 


div(FIX32 2 a,FIX32 2 b); 








fr 


iend 


FIX32 2 


div(FIX32 2 a, int b) ; 








fri 


iend 


FIX32 2 


d i v (F 1 X32 2 a, float b) ; 








fri 


iend 


FIX32 2 


d i v (F 1 X32 2 a, double b) : 









}; 

#if def i ned (_AMMPCC_) 
#pragma _pack_struct_default 
#endif //_AMMPCC_ 

// other functions 
#if def i ned (_AMMPCC_) 

#pragma _enab I e_asm_beg i n 

static inline FIX16 1 f ix161 (FIX32 1 a) 
{ 

FIX16J result; 
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asm(vrO = a) { 
asr vrl, vrO, 16; 
} (result = vr1) ; 

return result; 



static inline FIX16_2 _f ix162(FIX32_2 a) 

FIX16_2 result; 

asm(vrO = a) { 
asr vr1, vrO, 16; 
} (result = vr1) ; 

return result; 



static inline FIX16J _fix161 (short a) 

FIX16J result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline FIX16_2 _fix162 (short a) 

FIX16_2 result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline FIX32J _fix321(long a) 

FIX32J result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline FIX32_2 _fix322(long a) 

FIX32_2 result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 
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return result; 



static inline short _bptn(F 1X1 6_1 a) 

short result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline short _bptn(FIX16_2 a) 

short result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline long _bptn (F I X32_l a) 

long result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline long _bptn(FIX32_2 a) 

long result; 

asm(vrO = a) { 
mov vr1, vrO; 
} (result = vr1) ; 

return result; 

J 

static inline FIX16J _abs(FIX16_1 a) 

FIX16J result; 

asm(vrO = a) { 
absvh vr1, vrO; 
} (result = vrl) ; 

return result; 
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static inline F 1X32 J _abs(FIX32_1 a) 

FIX32J result; 

asm(vrO = a) { 
absvw vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline FIX16_2 _abs(FIX16_2 a) 

FIX16_2 result; 

asm(vrO = a) { 
absvh vrl, vrO; 
} (result = vrl) ; 



} 



return result; 



static inline FIX32 2 abs(FIX32 2 a) 
{ " " 

F I X32_2 result; 

asm(vrO = a) { 
absvw vrl, vrO; 
} (result = vrl) ; 

return result; 



static inline FIX16_1 jnax(FIX16J a, FIX16J b) 
FIX16J result; 

asm(vrO = a, vrl = b) { 
max vr2, vrO, vrl ; 
} (result = vr2) ; 



} 



return result; 



static inline FIX32J _max (FIX32J a, FIX32J b) 

F 1X32 J result; 

asm(vrO = a, vrl = b) { 
max vr2, vrO, vrl ; 
} (result = vr2) ; 



} 



return result; 



static inline FIX16_2 _max(FIX16_2 a, FIX16_2 b) 
{ 

FIX16 2 result; 
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} 



asm(vrO = a, vr1 = b) { 
max vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 



static inline FIX32_2 _max(FIX32 2 a, FIX32 2 b) 
{ 

F IX32_2 result; 

asm(vrO = a, vr1 - b) { 
max vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 



static inline FIX16_I _min(FIX16_1 a, FIX16J b) 

FIX16J result; 

asm(vrO = a, vr1 = b) { 
min vr2 f vrO, vr1 ; 
} (result = vr2) ; 



} 



return result; 



static inline FIX32J _min(FIX32J a, FIX32J b) 

FIX32J result; 

asm(vrO = a, vrl = b) { 
min vr2, vrO, vr1 ; 
} (result = vr2) ; 



} 



return result; 



static inline FIX16_2 _min(FIX16_2 a ? FIX16_2 b) 

FIX16.2 result; 

asm(vrO = a, vr1 = b) { 
min vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 

} 

static inline FIX32_2 _min(FIX32_2 a, FIX32_2 b) 

F I X32_2 result; 

asm(vrO = a, vr1 = b) { 
min vr2, vrO, vr1 ; 
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} (result = vr2) ; 
return result; 

} 

static inline FIX16J _adds (FIX16J a, FIX16J b) 
{ 

FIX16J result; 

asm(vrO = a, vr1 = b) { 
adds vr2, vrO, vr1; 
} (result = vr2) ; 

return result; 

} 

static inline FIX32J _adds (F I X32_1 a, FIX32J b) 
{ 

FIX32J result; 

asm(vrO = a, vr1 = b) { 
adds vr2, vrO, vr1; 
} (result = vr2) ; 

return result; 

} 

static inline FIX16_2 _adds (F I X1 6_2 a, FIX16_2 b) 
{ 

FIX16_2 result; 

asm(vrO = a, vr1 = b) { 
adds vr2, vrO, vr1; 
} (result = vr2) ; 

return result; 

} 

static inline FIX32_2 _adds (F I X32_2 a, FIX32_2 b) 
{ 

FIX32_2 result; 

asm(vrO = a, vr1 = b) { 
adds vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 

} 

static inline FIX16J _subs (F I X1 6_1 a, FIX16J b) 
{ 

FIX16J result; 

asm(vrO = a, vr1 = b) { 
subs vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 

} 
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static inline F 1X32 J _subs (F I X32_1 a, FIX32J b) 

FIX32J result; 

asm(vrO = a, vr1 = b) { 
subs vr2, vrO, vr1; 
} (result = vr2) ; 



1 



return result; 



static inline FIX16 2 subs(FIX16 2 a, FIX16 2 b) 

{ " " 

FIX16_2 result; 

asm(vrO = a, vr1 = b) { 
subs vr2, vrO, vr1; 
} (result = vr2) ; 



} 



return result; 



static inline FIX32 2 subs(FIX32 2 a, FIX32 2 b) 
t " " 

FIX32_2 result; 

asm(vrO = a, vr1 = b) { 
subs vr2 f vrO, vr1 ; 
} (result = vr2) ; 



} 



return result; 



static inline int _bcnt1 (FIX16J a) 

int result; 

asm(vrO = a) { 
bcntl vr1, vrO; 
} (result = vr1) ; 



1 



return result; 



static inline int _bcnt1 (F 1X16.2 a) 

int result; 

asm(vrO = a) { 

bcntl vr1, vrO; 
} (result = vr1) ; 



1 



return result; 



static inline int _bcnt1 (FIX32J a) 
int result; 
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asm(vrO = a) { 
bcntl vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline int _bcnt1 (FIX32_2 a) 

int result; 

asm(vrO = a) { 

bcntl vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline int _bseq(FIX16_1 a ) 

int result; 

asm(vrO = a) { 
bseq vrl, vrO; 
} (result = vr1) ; 

return result; 



static inline int _bseqO(FIX16_1 a) 
int result; 

asm(vrO = a) { 
bseqO vr1, vrO; 
} (result = vr1) ; 

return result; 



static inline int _bseq1 (F 1X1 6 J a) 

int result; 

asm(vrO = a) { 
bseql vr1 f vrO; 
} (result = vr1) ; 

return result; 



static inline int _bseq(FIX32_1 a ) 

int result; 

asm(vrO = a) { 
bseq vr1, vrO; 
} (result = vrl) ; 



Fig. 55 



return result; 

1 



static inline int _bseqO (F I X32 J a ) 

int result; 

asm(vrO = a) { 
bseqO vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int _bseq1 (FIX32J a) 

int result; 

asm(vrO = a) { 
bseql vrt, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int _bseq(FIX16_2 a) 

int result; 

asm(vrO = a) { 
bseq vrl, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int _bseqO(FIX16_2 a) 
int result; 

asm(vrO = a) { 
bseqO vr1 f vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int _bseq1 (FIX16_2 a) 

int result; 

asm(vrO = a) { 
bseql vr1, vrO; 
} (result = vr1) ; 

return result; 
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static inline int _bseq(FIX32_2 a) 

int result; 

asm(vrO = a) { 
bseq vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int _bseqO(FIX32_2 a) 

int result; 

asm(vrO = a) { 
bseqO vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline int J)seq1 (FIX32_2 a) 

int result; 

asm(vrO = a) { 
bseql vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline FIX16J _round(FIX32J a) 

FIX16J result; 

asm(vrO = a) { 
rndvh vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inline FIX16_2 _round(F IX32_2 a) 

FIX16_2 result; 

asm(vrO = a) { 
rndvh vr1, vrO; 
} (result = vrl) ; 



} 



return result; 



static inline void jnulr (FIX16J &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b) { 
fmulhhr mO, vr2, vrO, vr1 ; 
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} (c = vr2) ; 



static inline void _mulr (long &mh, long&ml, FIX16J &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b) { 
fmulhhr mO, vr2, vrO, vr1 ; 
} (mh = mhO, ml = mIO, c = vr2) ; 



static inl ine void _mul (long &mh, long&ml. FIX16J &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b) { 

fmulhh mO t vr2, vrO, vr1 ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul(long &mh f long&ml, FIX16_2 &c, FIX16_2 a, FIX16_2 b) 

asm(vrO = a, vr1 = b) { 

fmulhh mO, vr2, vrO, vr1 ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul(long &mh, long&ml, FIX32J &c, FIX16J a, FIX16_1 b) 

asm(vrO = a, vr1 = b) { 

fmulhw mO, vr2, vrO, vr1 ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul(long &mh, long&ml, F I X32_2 &c, FIX16_2 a, FIX16_2 b) 

asm(vrO = a, vr1 = b) { 

fmulhw mO, vr2, vrO, vr1 ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul (long &mh, long&ml, FIX32J &c, FIX32J a, FIX32_1 b) 

asm(vrO = a, vrl = b) { 

fmulww mO, vr2, vrO, vr1 ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void jnuKlong &mh, long&ml, FIX32_2 &c, FIX32_2 a, FIX32_2 b) 

asm(vrO = a, vr1 = b) { 

fmulww mO, vr2, vrO, vrl ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul(long &mh, long&ml, F 1X32 J &c, FIX16J a, FIX32J b) 

asm(vrO = a, vrl = b) { 
fmulhww mO, vr2, vr1 t vrO; 
} (mh = mhO, ml = mIO, c = vr2) ; 
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static inline void _mul (long &mh, long&ml, FIX32_2 &c, FIX16_2 a, FIX32_2 b) 

asm(vrO = a, vr1 = b) { 
fmulhww mO, vr2, vr1,vr0; 
} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul(long &nih, long&ml, FIX32J &c, FIX32J a, FIX16_1 b) 

asm(vrO = a, vr1 = b) { 
f mu I hww mO, vr2, vrO, vr 1 ; 
} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mul (long &mh, long&ml, FIX32_2 &c, FIX32_2 a, FIX16_2 b) 

asm(vrO = a, vr1 = b) { 
fmulhww mO, vr2, vrO, vr1 ; 
} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long &ml, FIX16J &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

f machh mO, vr2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long&ml, FIX16_2 &c, FIX16_2 a, FIX16.2 b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) [ 

f machh mO, vr2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inl ine void _mac(long &mh, long&ml, FIX32_1 &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

f machw mO, vr 2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long &ml, FIX32_2 &c, FIX16_2 a, FIX16_2 b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

f machw mO, vr 2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long &ml, FIX32J &c, FIX32J a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmachww mO, vr2, vrO, vr1,m0; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long &ml, FIX32_2 &c, FIX32_2 a, F 1X1 6_2 b) 
asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 
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fmachww mO, vr2, vrO, vr1,mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long Sml, FIX32J &c, FIX16J a, FIX32J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmachww mO, vr2, vr1 f vrO, mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long Sml. FIX32_2 &c, FIX16_2 a, FIX32_2 b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmachww mO, vr2, vr1, vrO, mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void jnacdong &mh, long &ml, FIX32J &c, FIX32J a, FIX32J b) 

asm(vrO = b, vr1 = a, mhO = mh, mIO = ml) { 

fmacww mO, vr2, vrO, vr1 , mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _mac(long &mh, long &ml, FIX32_2 &c, FIX32_2 a, F I X32_2 b) 

asm(vrO = b, vr1 = a, mhO = mh, mIO = ml) { 

fmacww mO, vr2, vrO, vr1,m0; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void jnacrdong &mh, long &ml. FIX16J &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmachhr mO, vr2, vrO, vr1, mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _msu(long &mh, long &ml, FIX16J &c, FIX16_1 a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmsuhh mO, vr2, vrO, vr1,mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void _msu(long &mh, long &ml, FIX16_2 &c, FIX16_2 a, FIX16_2 b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmsuhh mO, vr2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 



static inline void ^msudong &rah f long Sml v FIX32_1 &c, FIX16J a, FIX16J b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

f msuhw mO, vr2, vrO, vr 1 , mO ; 

} (mh = mhO, ml = mIO, c = vr2) ; 
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static inline void jnsudong &mh, long &ml, FIX32_2 &c, 


FIX16_2 


a, 


FIX16_2 b) 


asm(vrO = a t vr1 = b, mhO = mh, mIO = ml) { 
fmsuhw mO, vr2, vrO, vr1, mO; 

1 (mh — mhfi ml — m 1 H r> — \/r9^ * 

j villi I — mnu, nil — miu, o — mil.) $ 








static inline void _msu(long &mh f long &ml, FIX32_1 &c. 


FIX32J 


a, 


FIX16J b) 


asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 
fmsuhww mO, vr2, vrO, vr1, mO; 

1 (mh — mhO ml — m 1 0 n — \/ r 9^ " 

j vniri — mnu, mi — iniu, o - vr£y » 








static inline void _msu(long &mh, long &ml, FIX32_2 &c, 


FIX32_2 


a, 


FIX16_2 b) 


asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 
fmsuhww mO, vr2, vrO, vr1, mO; 

\ (mh — mhO ml — m 1 0 r> — \t r 0\ ' 

j v*i»i — mnu, mi — miu, u — vt/lj * 








static inline void _msu(long &mh f long &ml, FIX32_1 &c, 


FIX16J 


a, 


FIX32_1 b) 


asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 
fmsuhww mO, vr2, vr1, vrO, mO; 

1 (mh — mhO ml — m 1 H n — \ir r )\ ' 

j vmn — mnu, mi - iniu, o — vr L) * 








static inline void _msu(long &mh, long &ml, FIX32_2 &c, 


FIX16_2 


a, 


• 

FIX32_2 b) 


asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 
fmsuhww mO, vr2, vr1, vrO, mO; 

\ (mh — mhO ml — m 1 H n — \#r9^ ' 

/ vniri — innu, ini — miu, o — vr » 








static inline void _msu(long &mh, long &ml, FIX32_1 &c, 


FIX32J 


a, 


FIX32_1 b) 


asm(vrO = b, vr1 = a, mhO = mh, mIO = ml) { 
fmsuww mO, vr2, vrO, vr1, mO; 

1 (mh — mhH ml — m 1 0 — \rr f )\ ' 

i \ji\r\ — mnu, mi — miu, c — vrzy i 








static inline void _msu(long &mh, long &ml, FIX32_2 &c, 


FIX32_2 


a, 


FIX32_2 b) 


asm(vrO = b, vr1 = a, mhO = mh, mIO = ml) { 

fmsuww mO, vr2, vrO, vr1,m0; 

J \mu — mnu, ml — miu, C — Vr £.) , 








static inline void _msur(long &mh, long &m|, FIX16_1 &c, 


FIX16J 


a, 


FIX16_1 b) 


asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

fmsuhhr mO, vr2, vrO, vr1, mO; 

} (mh = mhO, ml = mIO, c = vr2) ; 








inline FIX16J operator/ (F I X16J a, FIX16J b) 






^^^^ 



« 
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} 



FIX16J result; 

asm(vrO = a, vr1 = b) { 

extw mO, vr3, vrO; 

as I p mO, vr4, mhO, vr3, 1 5 ; 

d j v mh1, vr5 t mhO, vr4, vrl ; 

sath vr2, vr5; 

} (result = vr2) ; 

return result; 



inline FIX16_2 operator/ (F I X16_2 a, FIX16_2 b) 

FIX16_2 result; 

asm(vrO = a, vr1 = b) { 

extw mO, vr3, vrO; 

as I p mO, vr4, mhO, vr3, 1 4 ; 

div mh1, vr5, mhO, vr4, vr1 ; 

sath vr2, vr5; 

} (result = vr2) ; 

return result; 

} 

inline FIX32J operator/ (F I X32J a, FIX32J b) 
FIX32 1 result; 



asm (vrO 


= a, vr1 = 


b) { 






mskgen 


vr3, 31,31; //vr3 = 0x80000000 






cmpeq 


C0:C1, vrl, vr3; 


[CO] negvw 


vr2, vrO; //in the case of vr1 = (-1), sign-change 






cmpgtn 


C2:C3, vr0,0, C1; //in the case of vr1! = (-1) 




[C2; 


negvw 


vr4, vrO; //sign-change vrO negatively (vrO f ) 




[C3] 


mov 


vr4, vrO; 






cmpgtn 


C2:C3, vr1 f 0, C1 ; 




[C2] 


negvw 


vr5 f vr1; //sign-change vr1 negatively (vrV) 




:c3; 


mov 


vr5, vr1 ; 






cmp I en 


C2:C3, vr4, vr5, C1 ; 


[C2] Isr 


vr6, vrO, 31 ; //vrO' <= 2vrT in the case of (ovf deci si on) , 


flow 




[C2] 


Isr 


vr7, vrl, 31 ; 


[C2! 


xor 


vr8, vr6, vr7; 






cmpeqn 


C4:C5, vr8, 0, C2; 




[C4] 


mskgen 


vr2, 30, 0; //vr2 = 0x7fffffff 




"C5" 


mskgen 


vr2, 31,31; //vr2 = 0x80000000 




"C3 : 


extw 


mO, vr9, vrO; //in the case of di vidend<di vider 




C3" 


aslp 


mO, vr10, mhO, vr9, 31 ; ^ 




= C3 : 


div 


mh1, vr2, mhO, vr10, vrl ; /if / 


} (resu 


t = vr2) ; 





return result; 
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inline FIX32_2 operator/ (F I X32_2 a. FIX32_2 b) 



FIX32.2 result; 



asm(vrO = 



} 



[CO 
[CI] 

[CO] 

:ci: 



[CI] 

[C2] 
"C2 
[C2 



[C4] 
C5 
C3 
C3 
!C3 
(resu 



a, vrl = 
mskgen 
mskgen 
cmpgt 
negvw 
mov 
cmpgt 
negvw 
mov 
cmpeq 
cmp I ta 
aslvw 
cmp I ea 
Isr 
Isr 
xor 

cmpeqn 
mskgen 
mskgen 
extw 
aslp 
div 
= vr2) ; 



b) { 

vr3, 31. 31 ; //vr3 = 0x80000000 
vr4, 31, 30; //vr4 = OxcOOOOOOO 
C0:C1, vrO, 0; 

vr5 ? vr0; //sign-change vrO negatively (vrO' ) 
vr5, vrO; 
C0:C1, vr1,0; 

vr6, vrl; //sign-change vr1 negatively (vrT) 
vr6, vr1 ; 
C0:C1, vrO, vr3; 

C0:C1, vr6, vr4, C0;//vr0=-2 and vrV <0xc0000000? 
vr6. vr6, 1; //!when (vr0=-2 and vrl' <0xc0000000) 
C2:C3, vr5, vr6, 01 ; 

vr7, vrO, 31; //!in the case of (vr0=-2 and vrT 
vr8.vr1.31; //<0xc0000000) and vrO' <= 2vrT 
vr9, vr7. vr8; //(ovf decision), overflow 
C4:C5. vr9. 0. C2; 

vr2. 30. 0; //vr2 = 0x7fffffff 
vr2, 31.31; //vr2 = 0x80000000 
m0.vr10.vr0; //other than that 
mO. vr11,mh0. vr10. 30; 
mh1, vr2. mhO. vr11, vrl ; 



} 



return result; 



inline F 1X1 6 J operator/ (F I X16_1 a. int b) 

FIX16_1 result; 

asm(vrO = a. vrl = b) [ 

extw mO. vr3, vrO; 

div mh1 , vr4. mhO, vr3. vr 1 ; 

sath vr2, vr4; 

} (result = vr2) ; 

return result; 



} 



inline FIX16_2 operator/ (F I X16_2 a. int b) 

FIX16_2 result; 

asm(vrO = a, vrl = b) { 

extw mO. vr3, vrO; 

div mh1, vr4, mhO, vr3. vrl ; 

sath vr2. vr4; 

} (result = vr2) ; 

return result; 
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inline FIX32J operator/ (F I X32_1 a, int b) 

FIX32J result; 

asm(vrO = a, vr1 = b) { 

cmpeq C0:C1,vr1,1; 



[CO] 
[CI] 



[C4] 
0x7fffffff 
■ [C5] 

[C5; 

} (resu t = 



mov 

mskgen 

cmpeqn 

cmpeqa 

mskgen 

extw 
div 
vr2) ; 



vr2, vrO; //when dividend=K Rc = Ra 
vr3.31.31; //0x80000000 
C2:C3. vrO, vr3, C1 ; 
C4:C5. vr1.-1,C2; 

vr2, 30, 0; //when dividend=-1 and divisor=-1 % Rc = 

mO. vr4, vrO; //other than that 
mh1, vr2, mhO, vr4, vr1 ; 



} 



return result; 



inline FIX32_2 operator/ (F I X32_2 a, int b) 



} 



FIX32_2 result; 



asm(vr0 = 



} 



[CO] 
CI 



[CO] 
[CI] 



[CI] 

[C2] 
[C2] 
[C2 



[C4 
C5 
C3 

:c3 

(resu 



a, vr1 = 
mskgen 
mskgen 
cmpgt 
negvw 
mov 
aslvw 
cmpgt 
negvw 
mov 
cmpeq 
cmp I ta 
aslvw 
cmp I ea 
Isr 
Isr 
xor 

cmpeqn 
mskgen 
mskgen 
extw 
div 
= vr2) ; 



b) { 

vr 3, 31,31; //Rd = 0x80000000 
vr4, 31.30; //Re = OxcOOOOOOO 
C0:C1, vrO, 0; 

vr5, vrO; //sign-change Ra negatively (Ra' ) 
vr5, vrO; 

vr 6, vr 1 , 30 ; // i nt— >F I X32_2 
C0:C1,vr6. 0; 

vr7, vr6; //sign-change Rb negatively (Rb' ) 
vr7, vr6; 
C0:C1, vrO. vr3; 

C0:C1, vr7, vr4, C0;//Ra=-2 and Rb' <0xc0000000 ? 
vr7, vr7, 1 ; // ! when (Ra=-2 and Rb' <0xc0000000) 
C2:C3, vr5, vr7, C1 : 

vr8, vrO, 31 : //! in the case of (Ra=-2 and Rb' <0xc0000000) 

vr9, vr1.31; // and Ra' <=2Rb' (ovf decision) 

vr10, vr8, vr9; //overflow 

C4:C5, vr10, 0, C2; 

vr2,30.0; //Rc = 0x7fffffff 

vr2.31.31; //Rc = 0x80000000 

mO, vr11,vr0; //other than that 

mh1, vr2, mhO, vr11, vr1 ; 



return result; 



inline FIX16J operator/ (F I X16J a, float b) 



{ 



FIX16_1 c = b; 
return a/c; 



•5 •* ,.»- 



Fig. 64 



inline FIX16J operator/ (F I X16_1 a. double b) 

FIX16J c = b; 
return a/c; 

1 

inline FIX32J operator/ (F I X32_1 a, float b) 

FIX32J c = b; 
return a/c; 

} 

inline FIX32J operator/ (F I X32J a, double b) 

FIX32J c = b; 
return a/c; 

inline FIX16_2 operator/ (F I X16_2 a, float b) 

FIX16_2 c = b; 
return a/c; 

inline FIX16_2 operator/ (F I X16_2 a, double b) 

F I X1 6_2 c = b; 
return a/c; 

inline FIX32_2 operator/ (F I X32_2 a, float b) 

FIX32_2 c = b; 
return a/c; 

} 

inl ine FIX32_2 operator/ (F I X32_2 a, double b) 

FIX32_2 c = b; 
return a/c; 

inl ine FIX16J& FIX16J : :operator/=(FIX16_1 b) 

♦this = ♦this / b; 
return ♦this; 

} 

inl ine volati le FIX16J& FIX16J : :operator/=(FIX16_1 b) volati 

♦this = ♦this / b; 
return *this; 

} 

inline FIX16J& FIX16J : :operator/=(int b) 

♦this = ♦this / b; 
return ♦this; 

} 
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inline volatile FIX16J& FIX16_I : :operator/=(int b) volatile 

*this = *this / b; 
return *this; 

inline FIX16J& FIX16J : :operator/=(f I oat b) 

*this = *this / b; 
return *this; 

inline volatile FIX16J& FIX16J : :operator/=(f loat b) volatile 

*this = *this / b; 
return *this; 

inline FIX16J& F I X1 6_1 :: operator/- (double b) 

*this = *this / b; 
return *this; 

inl ine volatile FIX16J& F I X1 6_1 : :operator/= (double b) volatile 

*this = *this / b; 
return *this; 

inl ine FIX32J& FIX32J : : operator/^ (F I X32J b) 

*this = *this / b; 
return *this; 

inl ine volati le FIX32J& FIX32_1 : :operator/=(FIX32J b) volati le 

*thjs = *this / b; 
return *this; 

inl ine FIX32J& FIX32J : :operator/=(int b) 

*this = *this / b; 
return *this; 

inline volatile FIX32J& FIX32J : :operator/=(int b) volatile 

*this = *this / b; 
return *this; 

inl ine FIX32J& FIX32J : : operator /= (float b) 

*this = *this / b; 
return *this; 
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} 



inline volati le FIX32J& FIX32J : :operator/=(f loat b) volatile 



{ 



} 



♦this = *this / b; 
return *this; 



inline FIX32J& F I X32_1 :: operator /= (double b) 

♦this = ♦this / b; 
return ♦this; 

} 

inline volatile FIX32J& F I X32_1 : :operator/= (double 

♦this = ♦this / b; 
return ♦this; 

} 

i n I i ne F I X1 6_2& F I XI 6_2 : : oper ator/= (F I XI 6_2 b) 



b) vo I at i I e 



{ 



} 



♦this = ♦this / b; 
return ♦this; 



inline volatile FIX16_2& FIX16_2: :operator/=(FIX16_2 b) volatile 



{ 



} 



♦this = ♦this / b; 
return ♦this; 



i n I i ne F I X1 6_2& F I XI 6_2 : : oper ator/= ( i nt b) 

♦this = ♦this / b; 
return ♦this; 

} 

inline volatile FIX16_2& FIX16_2: :operator/=(int b) volati le 



{ 



} 



♦this = ♦this / b; 
return ♦this; 



i n I i ne F I X1 6_2& F I X1 6_2 : : oper ator/= (f I oat b) 

♦this = ♦this / b; 
return ♦this; 

} 

inline volatile FIX16_2& FIX16_2: :operator/=(f loat b) volatile 



{ 



} 



♦this = ♦this / b; 
return +this; 



inline FIX16_2& F I X1 6_2 :: oper ator/= (double b) 



{ 



♦this = ♦this / b; 
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return *this; 



nline volatile FIX16.2& F I X1 6_2 : :operator/= (double b) volatile 

*this = *this / b; 
return *this; 



nline F I X32_2& FIX32_2: :operator/=(FIX32_2 b) 

*this = *this / b; 
return *this; 



nline volatile FIX32_2& FIX32_2: :operator/=(FIX32_2 b) volatile 

*this = *this / b; 
return *this; 



nline F I X32_2& F I X32_2 : :operator/=(int b) 

*this = *this / b; 
return *this; 



inline volatile FIX32_2& FIX32_2: :operator/=(int b) volatile 

*this = *this / b; 
return *this; 



nline F I X32_2& FIX32.2: :operator/=(f I oat b) 

*this = *this / b; 
return *this; 



nline volatile F I X32_2& FIX32_2: :operator/=(f loat b) volatile 

*this = *this / b; 
return *this; 



n I i ne F I X32_2& F I X32_2 : : oper ator/= (doub I e b) 

*this = *this / b; 
return *this; 



nline vo I at i I e F I X32_2& F I X32_2 : : operator/^ (doub I e b) vo I at i I e 

*this = *this / b; m 
return *th i s ; 

mi 



#pragma _enab I e_asm_end 



#endif //_AMMPCC_ 
#endif //_FIXAMMP 
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/#**#*##:>Me*************^ 
* 

* (C) Copyright 2002 Matsushita Electric Industrial Co., Ltd. 

* f uncammp. h 

* Version: 

* Release: 

* Date: 2002/6/19 
* 

************:Mc**********^ 

/* Avoid overloading */ 
#ifndef _FUNCAMMP_ 
#def ine _FUNCAMMP_ 

# include <stdl ib. h> 

#ifndef _AMMPCC_ 

I ong _abs ( I ong) ; 

long _max(long, long) ; 

long _min(long, long) ; 

I ong _adds ( I ong, I ong) ; 

long _subs(long, long) ; 

int _bcnt1 (long) ; 

i nt _bseq0 ( I ong) ; 

int _bseq1 (long) ; 

int _bseq(long) ; 

int _log2(size_t size); 

long _extr(long, unsigned int, unsigned int); 

unsigned long _extru(long, unsigned int, unsigned int); 

vo i d _c I rm ( I ong&, I ong&) ; 

vo i d _mu I ( I ong&, longS, long&, long, long); 

vo i d _mac ( I ong&, I ong&, I ong&, I ong, I ong) ; 

void jnsu(long&, long&, long&, long, long); 

void *_modu I o_add (vo i d *, int, int, size_t, void*); 

void *_b re v_add( void *, int, int, int, size_t, void*); 



#e I se /* def i ned _AMMPCC_ */ 

#pr agma _enab I e_asm_beg i n 
#pragma _enable_inl ine_begin 

long _extr( I ong, unsigned int, unsigned int); 
unsigned long _extru(long, unsigned int, unsigned int); 
int _log2(size_t size) ; 

stat i c i n I i ne I ong 
_abs ( I ong data) 

long result; 

asm(vr0 = data) { 

abs vr1, vrO; 
} (result = vr1) ; 

return result; 

} 




0 
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static inl ine long 
_max(long datal, long data2) 

long result; 

asm(vrO = datal, vrl = data2) { 

max vr2, vr1, vrO; 
} (result = vr2) ; 

return result; 

} 

static inl ine long 
mi n (long datal, long data2) 

long result; 

asm(vrO = datal, vr1 = data2) { 

min vr2, vr1, vrO; 
} (result = vr2) ; 

return result; 

} 

static inl ine long 
^addsdong datal, long data2) 

long result; 

asm(vrO = datal, vr1 = data2) { 

adds vr2, vrO, vr1 ; 
} (result = vr2) ; 

return result; 

} 

static inl ine long 
_subs(long datal, long data2) 

long result; 

asm(vrO = datal, vr1 = data2) { 

subs vr2, vrO, vrl; 
} (result = vr2) ; 

return result; 

} 

static inl ine int 
_bcnt1 (long data) 

long result; 

asm(vrO = data) { 

bcntl vrl, vrO; 
} (result = vrl) ; 

return result; 

1 



Fig. 71 



static inline int 
_bseqO(long data) 

long result; 

asm(vrO = data) { 

bseqOvrl, vrO; 
} (result = vr1) ; 



} 



return result; 



static inl ine int 
_bseq1 (long data) 

long result; 

asm(vrO = data) { 

bseql vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inl ine int 
_bseq(long data) 

long result; 

asm(vrO = data) { 

bseq vr1, vrO; 
} (result = vr1) ; 



} 



return result; 



static inl ine void 
_clrm(long &mh f long &ml) 

asm () { 

mul mO, vr1, vrO, 0; 
^ } (mh = mhO, ml = mIO) ; 

static inl ine void 

_mul (long &mh, long&ml, long &c, long a, long b) 

asm(vrO = a, vr1 = b) { 
mul mO, vr2, vrO, vr1 ; 
^ } (mh = mhO, ml = mIO, c = vr2) ; 

static inl ine void 

__mac(long &mh, long &ml, long &c, long a, long b) 

asm(vrO = a, vr1 = b, mhO = mh f mIO = ml) { 

mac mO, vr2, vrO, vr1 t mO; 
} (mh = mhO, ml = mIO, c = vr2) ; 




4 
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static inl ine void 

_msu(long &mh, long &ml, long &c, long a, long b) 

asm(vrO = a, vr1 = b, mhO = mh, mIO = ml) { 

msu mO, vr2, vrO, vr1, mO; 
} (mh = mhO, ml = mlO ? c = vr2) ; 



static inl ine void * 

_modu I o_add (vo i d *addr, int imm, int mask, size_t size, void *base) 
void *p; 

int tmp1, tmp2 f tmp3; 

tmp1 = _log2(size) ; 
tmp2 = mask + tmp1-1 ; 
tmp3 = imm « tmp1 ; 

asm(vrO = addr, vr2 = base, vr3 = tmp2, vr4 = tmp3) { 

mov CFRO, vr3; 

add vr6, vrO, vr4; 

addmsk vr7, vr2, vr6; 
} (P = vr7) ; 

return p; 



static inl ine void * 

_brev__add(void *addr, int cnt, int imm, int mask, size_t size, void *base) 
void *p; 

int tmp1, tmp2, tmp3, tmp4; 

tmp1 = _log2(size) ; 
tmp2 = mask + tmp1-1 ; 
tmp3 = 16 - mask - tmp1 ; 
tmp4 = imm « tmp3; 

asm(vrO = addr, vr1 = cnt, vr2 = base, vr3 = tmp2, vr4 = tmp3, vr5 = tmp4) { 
mov CFRO, vr3; 
Isl vr6,vr1,vr4; 
add vr7, vr6, vr5; 
mskbrvh vr8, vr2, vr7; 
} (p = vr8) ; 

return p; 



#pragma _enab I e_i n I i ne_end 
#pragma _enable_asm_end 




#end i f /* _AMMPCC_ */ 



#end i f /* _FUNCAMNIP_ */ 
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S100 



Loop A 

Repeat the following to all the intermediate 
codes of the function call format 




I 



S101 



Is the intermediate code an operator 
defined by the operator definition file 
fixammp.h or a function defined by the 
built-in function definition file 
funcammp.h? 




Yes 



S102 



Substitute the operator or the function with ah 
instruction specific to the target processor 



S103 




Loop A 
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Example of configuring latency 1 

<Example> Leave a space of 2 cycles between wte and rde 
static inline int getbits(int a) 

I 

int result '■ 
asm (vrO = a) { 

LATENCY LI, L2, 2 ; 
mov vrl, AVLD_BASEADDR ; 
Li: wte C0:C1, (vr1, AVLD_GETBITS), vrO ; 

L2: rde.C0:C1. vr2, (vrl. AVLD_READPORT) ; 

} (result = vr2) ; 
return result ; 

} 
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Example of configuring latency 2 



<Example> Leave a space of 2 cycles after wte 
until next extended register access 
static inline void skipbits(int a) 
{ 

asm (vrO = a) { 

mov vrl. AVLD_BASEADDR : 

wte CO: CI, (vrl. AVLD_SKIPBITS) . vrO, LATENCY (2) ; 

} ; 

} 
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Sample program 



#pragma _save_fxpmode func 
tunc (void) 

{ 

FIX16J a; 
(Main body) 

} 



Save FIX- type mode 

Configure FIX-type mode to _1 system 

— ► (Main body) 

Return to FIX-type mode 
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Internal processing 



Save: mov vrO, PSRO 

1Conf iguration: or vrl.vrO, 0x20 + mov PSRO, vr1 
OConf iguration: andn vrl.vrO, 0x20 + mov PSRO, vr1 
Return: mov PSRO, vrO 
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Application Example 

Regarding four functions, f11 t f 21 , f22 and f23, in the case of 

the function fll: _1 system calling the function f 21 : _1 system; 

the function f 21 : _ 2system calling the function f22: _2 system; 

the function f22: _2 system calling the function f23: _2 system 



Since the only function that may be called by other modes is f21, 
it is possible to switch to a normal mode by executing a pragma 
designation only to this function. 



